Complete Randomized Design In R